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EDITORIAL: 
WHAT IS THE FORTH INTEREST GROUP? 



The Forth Interest Group, which developed In the fertile ground of 
the computer clubs of the San Francisco Bay Area, grew in a few months 
from nothing to where we are now getting several letters a day from all 
over the country. With th is increasing publ ic interest we need to let 
people know what we are doing and why, what we would like to see happen, 
how others can be involved , and what we can and cannot do. 

We are involved because we believe* that this language can have a 
major effect on the usefulness of computers, especially small computers,* 
and we want to see it put ^o the test • Increasingly software is becoming 
the critical , limiting factor in the computer industry . Large software 
projects are especially difficult to develop and modify. Pew are happy 
with prevailing operating systems, which are huge , hard to understand , 
incompatible with each other , and without unity of design* 

The Forth language is its own operating system and text editor. It 
ia interactive , extensible (including use redefined data types ) , 
struct urejd , and recur si ve . Code is so compact that the entire system 
(mostly written in Forth) usually fits in 6K bytes, running stand<*alone 
with no other software required , or as a task in a conventional operating 
aystem. One person can understand the entire Forth system, change any 
part of it, or even write a new version from scratch. Run- time 
effioienoies are as little as 30$ slower than straight machine code, and 
even less if the system's built-in assembler is used. When the assembler 
ia not used , programs can be almost completely transportable between 
maohines. Any large Forth program is really a special»purpose , 
application-oriented language , greatly facil i tating maintenance and 
modification • We don ""t yet have conclusive data, but typical program 
development times and costs seem to be a fraction of those required by 
Fortran or assembly. Forth is especially useful for real-time, 
control- type' applications , for large projects , and for small machines • 

The problem is availability. Users have shown an ease of learning 
after they have a system available. The Forth characteristics of postfix 
notation, structured conditionals, and data stacks are best understood by 
use . To encourage Forth programmers , we need readily available systems 
even of. modest performance • We hope that three 1 eve Is will be available : 

1. Demonstration - free ( or under $20. ) introductory version 
without file structure which compiles and executes from keyboard 
input . 
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2. Personal - low cost ( $10. to $100. ) with RAM or tape 
baaed files. 

3. Professional - Commercial products for lab or industrial use 
and software development • ($tOOO. to $2500. ) 



Today the serious personal computer user holds the key to wider 
availability of the language. These users - generally engineers, 
businessmen, programmers - combine professional competence and 
commitment with the freedom to try new methods which may require a lot 
of time and tinkering with no definite guarantee of payoff. 
Practically everyone involved with the Forth Interest Group has both a 
personal and a professional Interest in computers. 



The Forth Interest Group is non-profit and non-commercial. Me 
aren 't associated with any vendor , no one is making money from it , and 
we are all busy with other work . We are an information clearinghouse 
and want to encourage distribution of all three of the previously 
mentioned levels of Forth. We do not have a Forth system for 
distribution at this time, and we don't want to get into the software 
or mail-order business because this is best left to companies or 
individuals committed to that goal . Naturally our critical issue ia 
how to keep going over the long haul with volunteer energy. We need 
cost-effective means of information exchange « 



At present we are writing for professional media » putting out 
this simple newsletter, and holding occasional meetings in the Bay 
Area. Also* we are developing a major technical and implementation 
manual, to be published in a Journal form as four installments , 
available by subscription. While we cannot ana^tBr all of the mail 
individually, we certainly read it all, to answer it in the 
newsletter. While we cannot fill orders for software or literature, 
we will try and point you to where it is available . We welcome your 
input of information or suggestions, how you could help, what you 
would like to see happen, and where we should go from here. 



Dave Bengel - Dave Boulton - Kim Harris - John James 
Tom Olsen - Bill Ragsdale - Dave Wyland 
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EVOLUTION OF A F.I.G. FORTH FREAK 



By Tom Olsen 



I have been actively involved in the personal comput ing movement 
since early in 1974 when I shelled out $120. for an 8008 chip. Since 
that time ray hardware and software have evolved into a very powerful and 
useful system, of which FORTH is a principal component. The system 
consists of an hSI-n, 28K of memory, 2 Diablo disks, an LA30 DECWRITER, a 
^iablo HYT^PE-I printer, a VDM- 1 display, and dual floppy disk drives . 
Obtaining an operating system which would effectively utilize all of this 
hardware initially appeared to be much too expensive for an individual to 
buy, and far too complex to write from scratch. This attitude changed 
when early in 1976 I read a technical manual describing the internal 
organization of a relatively unknown '•language" called FORTH . Here was a 
programming system which included not only an editor, assembler, and file 
nanagement system, but the inherent capability to be rapidly expanded to 
perform any computer function I could define. The best part was the fact 
that the central core of this programming system was relatively small and 
would easily fit into 3K of memory* The large ma Jority of the system 
programming could be done in terms of high level f unct ions which I wou Id 
have the freedom to define. 



After about three months of late nights and pulling my hair ou t , I 
finally had a stand alone FORTH system which I could bootstrap and then 
use to load application vocabularies from disk. Once the basic 
implementation was fully debugged my general throughput of useful 
application software increased to a level I never would have thought 
possible. I can't over-emphasize the satisfaction associated with 
implementing the language from scratch. An added benefit of this approach 
is the flexibility derived by having a 100% understanding of ALL of the 
code your machine is executing. 



"^oday I have appl ication vocabularies which can do everything from 
playing a BACH minuet on a cdmputer controlled synthesizer to generating, 
sorting, and printing the FORTH INTEREST GROUP mailing list. It is ray 
hope that with the continued growth of the FORTH INTEREST GROUP and the 
establishment of some syntactical standards, widespread exchange of 
applications vocabularies will greatly enhance the computing power of all 
users of FORTH-»like languages . 
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USING FORTH FOR TRADEOFFS BETWEEN 
HARDWARE/F I RMWARE/SOFTWARE 

By Dave Wyland 

FORTH provides a unique capability for changing the tradeoffs between 
software, firmware, and hardware . Th is capability derives from the method 
cf nested definition of operators in FORTH* 

Firmware (i*e^ microprogramming) can add new instructions to the 
instruction set of an existing machine* New hard ware designs can also add 
instructions to an existing set, with the Z80 upgrade of the 80bO serving 
as a good example. These new instructions could significantly improve the 
throughput of a system in many cases: however these new instructions 
cannot be used with existing software without rewriting the software* 
This is because current software methods such as assembler language, BASIC 
interpreters, FORTRAN compilers, etc., create software programs as one 
list of instructions. To add improved instructions to a program generated 
by a FORTRAN compiler involves rewriting the compiler to efficiently use 
the new instructions and then recompiling the program* This is not a 
trivial task since decisions must typically be made as to when to use a 
new instruction. This is why each new machine requires a new, rewritten 
FORTRAN compiler. The fact that the job has been done many times before 
is not very comforting. 



With FORTH , however , operations are built-up of nested definitions 
with a common functional interface between ope rat ions. If a new 
instruction has been added to the computer's instruction set, it can be 
added to the FORTH system by changing a sma 11 number of definitions, in 
the typical case . The me thod can be quite straightforward . Each new 
instruction does an operation which would have required several 
instructions in the previous case* By identifying those FORTH definitions 
which could benefit from the new instruct ions and re coding them to include 
it, all software which uses the modified definitions is immediately 
improved. Also, very few definitions will have to be modified: only those 
elementry definitions with a high frequency of use need be modified to 
achieve throughput increase near the maximum possible. 



S ince the FORTH definitions are nested, the throughput gain of new 
instruct ions can be achieved by modifying a small amount of code, and the 
remaining structures remain unchanged* All existing application programs, 
translators, etc. are immediately improved without change ! 



"ote that this process is reversable * Programs created for an 
existing system which has an extensive instruction set can be run on a 
simpler machine by converting the appropriate code based definitions to 
nested (colon) definitions. The process is also incremental: new 
instructions can be added one-a t-a- t ime as desired* 
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FORTH LEARNS GERMAN 



By John James 



Forth now understands German , thanks to the following redefinitions 
of the operations in the Decus (Caltech) Forth manual. 

Many of the operations were mathematical symbols, and of course 
they did not have to be translated- Of the rest, the control operations 
(IF, THEN, ELSE , BEGIN , END , DO, LOOP, +LOOP) are special , because they 
are "immediate operations"; that is, they are executed at compile time. 
Just redefining their names would not work, because they would try to 
execute right in the definitions. 5o their original definitions were 
copied, but with the German names. 

Program development time for bilingual capability, two hours. 
Memory required, 600 bytes. Effect on run-time execution speed , zero • 



BLOCK 30 
1 ( GERMAN. 



2 
3 
4 
5 
6 
7 
8 
9 
10 
11 
12 
13 
14 
15 
16 



JJ, 6/19/78) 



ABWFPFFN DROP 
VFRT SWAP ; 
UVBFOTNGT ABS 
HOCHST MAY ; 
OnEP OR y : 



: imER OVER 
SPARFN <^AVE ; 

: HMD ANT) ; 
: MI>inF<;T MTK j 
/RFRT /MOn • : 
: HTFR FFRF ; 



: UNSPAPPN imSAVF ; 

: RKST HOT) ; 
0SFT2EN OSFT ; 

: VFRCFSSFM FORGFT 



: PPSTANDTn COMSTANT j 
ORDNHNG ARRAY ; : TORDfn'VG TARRAY 



IRFTZPV ISFT ; 
5?CHLnSSFT. COOF ; 
PANZF INTFCFR ; 
SPTZEN SET ; 

AUFS-LAUFENDE UPDATE ? : AUSRADTERBN ERASE-CORE 
LADEN LOAD ; : ZURUCK CR ; 
SCHREIBEN TYPE ; : BASIS BASE ; 



( THE SAME: DUP, MINUS, »L, BLOCK, ;S, F) 



The control operation definitions (OB, DANN , SONST, BEGINNEN, 
ENDEN, TUN, SCHLINGE, +SCHLINGE) are not shown here; they are all 
short (one line), and exact copies of the English operations . 
(Incidently this particular vocabulary is a rough draft; we have not 
seen the results of the International Forth Standards Team , which 
is currently at work.) The word GERMAN is defined on the load screen, 
so that the Forth user can cal 1 in the German vocabulary when desired . 
The following session shows the entry and execution of a f ibonacci 
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sequence program in German (until 16-bit overflow) - 



FORTH LOAn 
OK 

GERMAN 
OK 

: PRUFUNG 1 30 TUN VERT DUP • UBER + SCHLINGE ABWERFEN ABWERFEN ; 

OK 

PRUFUNG 

1 1 2 3 5 8 13 21 34 55 89 144 233 377 610 987 1597 2584 4181 6765 10946 
28657 -19168 9489 -9679 -190 -9869 -10059 

On a (slightly) more speculative note, why not extend this 
scheme to a compu t e r assisted international language for computer 
conferences, electronic mail, and international data-base utilities? 
Clearly natural language is too free, and computer languages like 
BNF arc too restrictive, to be feasible. But a hybrid, a vocabulary 
of several hundred unambi(juous words (each used in one sense only), 
and perhaps some computer-oriented syntactical marke rs , should be 
enough for useful dialog within a particular interest area. If it 
works for two languages it should work as well for any number. The 
final test - whether international teams could collaborate, after 
minimal training * would take a few weeks programming at most, after 
the vocabularies and terminal interfaces had been determined. 



FORTH MAILBA6 
By Dave Bengel 

The Forth Interest Group developed from several people in the 
San Francisco- San Jose area who have been working on Forth for the 
last year and a half. Until about six months ago most of these users 
were unaware of each other. Until the publication of the article by 
John James in Dr . Dobb * s Journal (May 1978) , about 80 percent of the 
group was from the Homebrew Computer Club - whose publication should 
also be watched for news concerning the F.I.G. 

We now have nearly 200 names on the mailing list# and are 
receiving about six letters a day. The writers' main question is how 
to get a version for their machine. 

We don't yet have a detailed description of the versions of Forth 
now aval 1 able , nor is there a standard form of the language available 
for various CPUs. Intense work on implementations is now underway ; 
e.g. the Forth Interest Group implementation workshop. We will keep 
yo u in formed as more documen tat ion and sys terns become aval 1 able . 

Your answers to the questionaire in this newsletter will help us 
keep a mailing list for inter est- specific applications , documentation , 
CPU versions, etc. We appreciate any information you can send us, 
particularly about Forth versions or variants which are running or 
being developed, or any software we can publish. We need your 
contributions to this newsletter (which we hope will grow into a 
journal) . 
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IMPLEMENTATION WORKSHOP 



The Forth Interest Group will hold an implementation workshop, 
starting sometime in July. The purpose is to create a uniform set 
of implementations for common micros. The assembly listings which 
result will be available through F.I.G, to those who wish to distribute 
specific versions- 

This will be a small group, no more than ten, with only one person 
for each machine. There will be approximately four all-day sessions, 
over six weeks. Implementers must have access to their target machine, 
with an assembler and editor; floppy or tape is not required. The 
meetings will be to share notes and specific guidance on implementation 
details. At the end of the workshop we should have uniform Forth 
versions for all the machines. 

We now have implementers scheduled for 8080 , 6 50 2 , PACE , and 
LSI-11. We need implementers for 6800, 280, 1802, F8, System 3 (32), 
5100, etc. We also need a project librarian with Forth experience . 

If you are interested write to FORTH IMPLEMENTATION PROJECT, 
209 56 Corsair Blvd., Hay ward , Ca . 94 54 5 . 



Forth Interest Group needs the following material : 

(1) Manuals available for distribution. We can purchase copies and 
distribute^ or print from your authorized original. 

(2) Name and address of Forth implementations for inclusion in our 
publications • Include computer requirements , documentation , and cost . 

(3) Technical material for the forthcoming journal. Both expositions 
on internal features of Forth and application programs are needed . 

(4) Users who may be referenced for local demonstration to newcomers, 
on a regional basis* Indicate interest area (i.e. personal 
computing, educational, scientific, industrial, etc.) . 

(5) Letters for publication in this newsletter . 



CONTRIBUTED MATERIAL 
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